home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / complib / SPBSL.z / SPBSL
Encoding:
Text File  |  1998-10-30  |  1.8 KB  |  67 lines
  1.  
  2.  
  3.  
  4. SSSSPPPPBBBBSSSSLLLL((((3333FFFF))))                                                            SSSSPPPPBBBBSSSSLLLL((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      SPBSL   - SPBSL solves the real symmetric positive definite band system
  10.      A*X = B using the factors computed by SPBCO or SPBFA.
  11.  
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
  14.       SUBROUTINE SPBSL(ABD,LDA,N,M,B)
  15.  
  16. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  17.      On Entry
  18.  
  19.      AAAABBBBDDDD REAL(LDA, N)
  20.         the output from SPBCO or SPBFA.
  21.  
  22.      LLLLDDDDAAAA INTEGER
  23.         the leading dimension of the array  ABD .
  24.  
  25.      NNNN INTEGER
  26.         the order of the matrix  A .
  27.  
  28.      MMMM INTEGER
  29.         the number of diagonals above the main diagonal.
  30.  
  31.      BBBB REAL(N)
  32.         the right hand side vector.  On Return
  33.  
  34.      BBBB the solution vector  X . Error Condition
  35.  
  36.      AAAA division by zero will occur if the input factor contains a zero on the
  37.      diagonal.  Technically, this indicates singularity, but it is usually
  38.      caused by improper subroutine arguments.  It will not occur if the
  39.      subroutines are called correctly and  INFO .EQ. 0 .  To compute
  40.      INVERSE(A) * C  where  C  is a matrix with  P  columns
  41.         CALL SPBCO(ABD,LDA,N,RCOND,Z,INFO)
  42.         IF (RCOND is too small .OR. INFO .NE. 0) GO TO ...
  43.         DO 10 J = 1, P
  44.         CALL SPBSL(ABD,LDA,N,C(1,J)) 10 CONTINUE LINPACK.  This version dated
  45.      08/14/78 .  Cleve Moler, University of New Mexico, Argonne National Lab.
  46.      Subroutines and Functions BLAS SAXPY,SDOT Fortran MIN0
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.